unit App.Action.TAppDefaultDeleteAction;

interface

uses SmallStruct.Action,
  App.Action.TAppCustomeAction;

type
  TAppDefaultDeleteAction = class(TAppCustomeAction)
  protected
    function DoPerform(ActionContext: ISSActionContext): Boolean; override;
  end;

implementation

{ TAppDefaultDeleteAction }

function TAppDefaultDeleteAction.DoPerform(ActionContext: ISSActionContext): Boolean;
begin
  Result := False;
  GetRequestViewPrimaryDataModel.DeleteRecord;
  Result := True;
end;

end.
